﻿//
//  PinObject.cs
//
//  Author:
//       Anna-Sophia Schröck <annasophia.schroeck@gmail.com>
//
//  Copyright (c) 2014 Anna-Sophia Schröck
//
//  This program is free software: you can redistribute it and/or modify
//  it under the terms of the GNU Lesser General Public License as published by
//  the Free Software Foundation, either version 3 of the License, or
//  (at your option) any later version.
//
//  This program is distributed in the hope that it will be useful,
//  but WITHOUT ANY WARRANTY; without even the implied warranty of
//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//  GNU Lesser General Public License for more details.
//
//  You should have received a copy of the GNU Lesser General Public License
//  along with this program.  If not, see <http://www.gnu.org/licenses/>.
using System;
using System.Runtime.InteropServices;

namespace System.API.OpenCL
{
	public class PinObject : IDisposable
	{
		private readonly GCHandle m_pgcHandle;

		public PinObject(object pObj)
		{
			m_pgcHandle = GCHandle.Alloc(pObj, GCHandleType.Pinned);
		}
		public void UnPin()
		{
			Dispose();
		}
		public void Dispose()
		{
			m_pgcHandle.Free();
		}
		public static implicit operator IntPtr(PinObject pinned)
		{
			return pinned.m_pgcHandle.AddrOfPinnedObject();
		}
	}
	public static class PinnedHelper
	{
		public static PinObject Pin(this object obj)
		{
			return new PinObject(obj);
		}
	}
}

